home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 6 / The Arsenal Files 6 (Arsenal Computer).ISO / prg_casm / jlvesa11.zip / JLVESA13.ASM < prev    next >
Assembly Source File  |  1995-11-14  |  701b  |  49 lines
  1. ; This routine is part of VESA SVGA -library
  2. ;
  3. ; Copyright 1994 Johannes Lehtinen
  4. ; All rights reserved
  5.  
  6. model large,c
  7. p386
  8.  
  9. segment jlvesa13_TEXT USE16 'CODE'
  10. assume cs:jlvesa13_TEXT
  11.  
  12. ; void JVPalette_Set(JVPalette palette)
  13. ;
  14. ; Function sets palette
  15.  
  16. proc JVPalette_Set far
  17.    public JVPalette_Set
  18.  
  19.    push  bp
  20.    mov   bp,sp
  21.    push  si
  22.    push  ds
  23.  
  24.    lds   si,[ss:bp+6]         ; Load address of palette
  25.    cld                        ; Direction forward
  26.  
  27.    ; Set palette
  28.  
  29.    mov   dx,3c8H
  30.    mov   al,0
  31.    out   dx,al
  32.  
  33.    mov   dx,3c9H
  34.    mov   cx,3*256
  35.  
  36.    rep   outsb
  37.  
  38.    pop   ds
  39.    pop   si
  40.    pop   bp
  41.    retf
  42.  
  43. endp JVPalette_Set
  44.  
  45. ends
  46.  
  47. end
  48.  
  49.